breakpoint.colors <-
  c(">0breakpoints"="#a445ee",
    "$>$0breakpoints"="#a445ee",
    "1breakpoint"="#ff7d7d",
    "breakpoint"="#a445ee", ## used for >0 bkpts in ch3.
    "0breakpoints"="#f6f4bf",
    #normal="skyblue",
    "normal"="#f6f4bf")

